<script>on mouseUpput cd fld "resourceID" into resourceIDput cd fld "theString" into theStringput cd fld "resourceName" into theNameput cd fld "theFile" into theFileif ((resourceID < 0) or (resourceID > 32000)) thenanswer "Resource ID must be between 0 and 32000."select text of cd fld "resourceID"exit mouseUpend ifif theName is empty then put " " into theNameCreateSTR theFile, resourceID, theString, theNameif the result <> empty then answer the resultend mouseUpon mouseEnterShowABalloon "After filling in these fields, " ¬& "click here to create a STR resource which will be stored " ¬& "in the indicated stack. You can use this resource with Balloons() " ¬& "when using ""e&"ShowSTR""e&" as the Selector. The " ¬& "script of this button contains an example of " ¬& quote&"CreateSTR.""eend mouseEnteron mouseLeaveRemoveABalloonend mouseLeave</script>
</part>
<part>
<id>8</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>244</left>
<top>173</top>
<right>337</right>
<bottom>195</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Choose File</name>
<script>on mouseUpanswer file "Select file in which to store STR resource:" of type STAKif it is empty then exit mouseUpput it into cd fld "theFile"put lpc(it) into cd fld "shortFileName"end mouseUpon mouseEnterShowAString 1517,,2end mouseEnteron mouseLeaveRemoveABalloonend mouseLeavefunction lpc thePathput empty into temprepeat until last char of thePath = ":"if last char of thePath <> quotethen put last char of thePath before tempdelete last char of thePathend repeatreturn tempend lpc-- ShowAString handler is located in the script of this background</script>
</part>
<part>
<id>9</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>342</left>
<top>174</top>
<right>499</right>
<bottom>193</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>theFile</name>
<script></script>
</part>
<part>
<id>10</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>342</left>
<top>174</top>
<right>499</right>
<bottom>193</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>ShortFileName</name>
<script>on mouseEntershowABalloon "The stack name in this field shows where the new " ¬& "STR resource will be stored. Change the name by clicking the " ¬& "Choose File button.",,5end mouseEnteron mouseLeaveRemoveABalloonend mouseLeave</script>
</part>
<content>
<layer>background</layer>
<id>3</id>
<text><span class="style2">reateSTR is an XCMD, included in this stack, which permits the creation of STR resources without leaving HyperCard. You can use these STR resources in your own stacks with Balloons() when "ShowSTR" is the Selector. This card may be used to create and store STR resources in any of your own stacks; however, </span><span class="style3">if you would like to copy the CreateSTR XCMD to another stack, be sure to read the warning at the bottom of this field!</span><span class="style2">In the current version, 1.0, the syntax variations are:CreateSTR "!" -- returns version information in "the result"CreateSTR "?" -- returns syntax information in "the result"</span><span class="style3">CreateSTR theFile, resourceID, theString[, resourceName] </span><span class="style2">-- creates an STR resource and stores it in the resource fork of the indicated stacktheFile can be any file. If it is not in the same folder as the current stack, you need to provide a full path name. The easiest way to do this is with the "answer file" command provided by HyperCard, as shown in the script of the "Choose File:" button below. If theFile is empty, the string will be put into the stack containing the XCMD (in this case, the Balloons stack.)</span><span class="style3"></span><span class="style2">The resource ID can be any integer between 0 and 32000. If there is already an existing STR resource with the chosen ID number, a dialog box is presented giving you the choice of 1) cancelling the request to create the resource, 2) changing the ID number of the new STR resource, or 3) replacing the existing STR resource with the new one you are creating.theString can be any HyperCard container or string literal.resourceName is optional and should be a short string describing the resource. If nothing is passed, the STR resource will have no name.You can create STR resources from this card. First click "Choose File:" and choose the stack in which you wish to store the STR resource. Fill in the remaining fields below and click the "Create the String" button. The STR resource will be stored in the resource fork of the stack indicated in the Choose File field. </span><span class="style3">WARNING:</span><span class="style2"> If you are going to copy the CreateSTR XCMD to another stack, you must also copy the DLOG and DITL resources (both with ID's number 1514.) If these resources aren't present and you try to create an STR when there is already an existing STR with the same ID, you will crash </span><span class="style12">very</span><span class="style2"> comprehensively.</span></text>
</content>
<content>
<layer>card</layer>
<id>10</id>
<text>Balloons!</text>
</content>
<name>Create Strings</name>
<script>on closeCardput empty into cd fld "theFile"pass closeCardend closeCardon openCardput the short name of this stack into cd fld "shortFileName"pass openCardend openCard</script>
</card>
card_5879.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<script>on mouseUppicture 5002,"resource",plainend mouseUpon mouseEntershowABalloon "Click here to see the different balloon versions "¬& "available for use with Balloons() XFCN."end mouseEnteron mouseLeaveRemoveABalloonend mouseLeave</script>
</part>
<content>
<layer>background</layer>
<id>3</id>
<text><span class="style2">ach of the Standard Display Calls can take one or two optional parameters: - Fourth parameter: Version: a number between 0 and 7 indicating the preferred shape and location of the balloon's tip. To see the possible balloon variations, click the "Balloon Versions Reference" button on this card. - Fifth parameter: alternativeRect: a HyperCard rectangle used to create a "hot rectangle."These parameters are described in detail below.</span><span class="style10">Version</span><span class="style1"></span><span class="style2">The fourth parameter, which is optional, must be a number between 0 and 7 which indicates the </span><span class="style9">perferred</span><span class="style2"> version of the balloon to be used. The balloon versions vary in appearance by where on the balloon the tip is located and the direction in which it points. To see the possible Version variations, click the "Balloon Versions Reference" button on this card.Note that the Version is simply the </span><span class="style9">perferred</span><span class="style2"> style. The XFCN (via the Help Manager) may move the balloon or change its style to ensure that the balloon appears on screen and hides as little of the object of interest as possible. If no alternativeRect is passed (see below,) the requested Version will usually be used. It will only change the Version if necessary to keep the balloon on the screen.If no Version is passed or an empty parameter is passed, the Version defaults to style 0, which seems to look the best most of the time.</span><span class="style10">AlternativeRect</span><span class="style1"></span><span class="style2">The alternativeRect is the "hot rectangle" which specifies the area the mouse must be in for a balloon to be displayed. Generally in the case of buttons and fields, you will want this to be the rect of the object and may choose not to pass an alternativeRect, using instead "mouseEnter" and "mouseLeave" scripts to control the appearance and removal of balloons. Except for a few fields (like this one,) this is how balloons are controlled for all the objects in this stack. There is one advantage, however, to passing an alternativeRect parameter. If you pass an alternativeRect, the balloon is automatically removed when the mouse leaves the "hot rectangle," with no need to call Balloons("Remove").The alternativeRect is optional and can be omitted even when a Version is passed, so the following is legal:put Balloons("Show", myMessage, theTip, 5) into helpResult This would display the string in myMessage at the point in theTip, preferably using balloon version number 5.If you want to indicate an alternativeRect but no Version, then an empty parameter must be passed in the Version position:put Balloons("Show", myMessage, theTip,,myRectangle) into helpResultThis is equivalent to:put Balloons("Show", myMessage, theTip,0,myRectangle) into helpResult</span></text>
</content>
<name>Optional Parameters</name>
<script></script>
</card>
card_5335.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<text><span class="style2">ollowing are the standard calls to Balloons() which actually display a help balloon. There are three required parameters for each call: -First parameter: "Selector": the selector tells Balloons() what method it should use to display the balloon. - Second parameter: "Message": information about the message to be shown in the balloon. The contents and form of the Message depend on the Selector. - Third parameter: "Tip": a point (h,v) in card coordinates (i.e. local coordinates) indicating the desired location of the tip of the balloon. When no optional parameters are passed, the tip of the balloon will always appear at the requested point. (Optional parameters are discussed on the next card.)Both the Message and Tip can be in any HyperCard container and the container passed instead of the actual value.Remember that Selectors are case sensitive and must be typed exactly as you see them in the examples below. If you have Balloon Help tuned on, you may click on any bolded example to see a representative balloon or return value:</span><span class="style10">Balloons("Show", myMessage, Tip)</span><span class="style1"></span><span class="style2">The "Show" Selector is used to show a HyperCard string contained in myMessage. This can be done either by putting the message into a container and passing the container, e.g.:put "This is an example of a string to be shown by Balloons XFCN" into myMessageput Balloons("Show",myMessage, the loc of target) into helpResultor by passing it directly:put Balloons("Show",¬"This is an example of directly passing a string to be shown by Balloons()",¬the loc of the target) into helpResult</span><span class="style10">Balloons("ShowPICT", PictID, Tip)</span><span class="style1"></span><span class="style2">The "ShowPICT" Selector is used to display a PICT resource whose resource ID is contained in PictID. For example:put the loc of the target into Tipput Balloons("ShowPICT", 1513, Tip) into helpResult</span><span class="style10">Balloons("ShowSTR", STRID, Tip)</span><span class="style1"></span><span class="style2">The "ShowSTR" Selector is used to show an STR resource whose resource ID is contained in STRID. For example:put the loc of the target into Tipput Balloons("ShowSTR", 1513, Tip) into helpResult</span><span class="style10">Balloons("ShowSTRList", "STRListID, index", Tip)</span><span class="style1"></span><span class="style2">The "ShowSTRList" Selector is used to show a string contained in an STR# (string list) resource. The Message parameter is a HyperCard string containing two items: the STR# resource ID, and the desired string's index (its position in the STR# resource.) These two items must be separated by a comma. For example, if you wanted to display the second string in STR# resource ID 1513, you would script:put 1513 && "," && 2 into myMessageput the loc of the target into Tipput Balloons("ShowSTRList", myMessage, Tip) into helpResult</span></text>
</content>
<name>Standard Display Calls</name>
<script>on doDisplayglobal isSixif isSix then errorMsgif the textstyle of the clickline = "bold" thenput "1515" into PICTIDput "This is an example Help message." into myMessageput "1515" into STRIDput ((the left of fld "info") + 250) & "," ¬& the clickV into tipput 1514 into STRListIDput 3 into indexput the rect of fld "info" into altRectsubtract 18 from item 3 of altRect -- scroll barput parseLine(value(the clickLine)) into balloonMsgdo "put " & balloonMsg & "into fld helpMessage"end ifend doDisplayfunction parseLine theLine -- add alternativeRect to paramsdelete last char of theLineput ",,altRect)" after theLinereturn theLineend parseLine</script>
</card>
card_4575.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<text><span class="style2">ach utility call takes a single parameter only. There are no optional parameters. It is important to note that these parameters are case sensitive and must be typed exactly as you see them in the examples below; otherwise, a syntax error will be returned. Because Balloons() is an XFCN it will always return a result, which will be empty if all went well. The correct syntax for utility calls follows the form:put Balloons("On") into helpResultYou will then probably want to test the result:if helpResult is not empty then put helpResult into the message boxend ifFollowing are the utility calls for Balloons(). You may click on any bolded example to see a return value:</span><span class="style10">Balloons("!")</span><span class="style1"></span><span class="style2">Returns a string with version and copyright information</span><span class="style10">Balloons("?")</span><span class="style1"></span><span class="style2">Returns a string with abbreviated syntax help</span><span class="style10">Balloons("isOn")</span><span class="style1"></span><span class="style2">Returns either "true" or "false", indicating whether Balloon Help is currently on. A single call to "isOn" can also determine if Balloon Help (i.e., the Help Manager) is present, as an error message will be returned if it is not.</span><span class="style10">Balloons("On")</span><span class="style1"></span><span class="style2">Turns Balloon Help on. This is the same as selecting "Show Balloons" from the Help menu. If Balloon Help is already on, it has no effect. Note that this affects </span><span class="style9">all</span><span class="style2"> applications, not just HyperCard, so if the author turns Balloon Help on with this, she has an obligation to turn it back off when HyperCard is not the active application any longer.</span><span class="style10">Balloons("Off")</span><span class="style1"></span><span class="style2">Turns Balloon Help off. This is the same as selecting "Hide Balloons" from the Help menu. If Balloon Help is already off, this has no effect.</span><span class="style10">Balloons("Remove")</span><span class="style1"></span><span class="style2">If a balloon is showing, this removes it from the screen. If there is no balloon showing, an error message is returned for diagnostic purposes, unless Balloon Help is turned off.</span></text>
</content>
<name>Utility Calls</name>
<script>on doDisplayglobal isSixif isSix then errorMsgif the textstyle of the clickline = "bold" thendo "put " & value(the clickLine) & "into fld helpMessage"end ifend doDisplay</script>
</card>
card_4139.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<script>on mouseUpput Balloons("?") into fld "helpMessage"end mouseUpon mouseEnterShowABalloon "Click on this to see brief information "¬& "on the syntax for Balloons(). Also note the variation "¬& "code and the use of the ""e&"?""e&" parameter used in " ¬& "the button script.",,5end mouseEnteron mouseLeaveRemoveABalloonend mouseLeave</script>
</part>
<part>
<id>4</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>425</left>
<top>177</top>
<right>501</right>
<bottom>199</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Version</name>
<script>on mouseUpput Balloons("!") into fld "helpMessage"end mouseUpon mouseEnterShowABalloon "Click here for copyright and "¬& "version information. See the button script for an example "¬& "of the use of the ""e&"!""e&" parameter.",,5end mouseEnteron mouseLeaveRemoveABalloonend mouseLeave</script>
</part>
<part>
<id>8</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>13</left>
<top>177</top>
<right>95</right>
<bottom>199</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>ShowSTR# 1</name>
<script>on mouseUpput "Balloons(""e&"ShowSTRList""e&", STRResourceID, tip[, version, alternativeRect])" ¬into fld "helpMessage"end mouseUpon mouseEnter-- This displays item 1 of STR# resource ID number 1514-- Note that it differs from the mouseEnter handler for-- "ShowSTR# 2" only in the item number to be displayed.ShowASTRList 1514,1,,6end mouseEnteron mouseLeaveRemoveABalloonend mouseLeave-- ShowASTRList handler is located in the script of this background</script>
</part>
<part>
<id>9</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>100</left>
<top>177</top>
<right>182</right>
<bottom>199</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>ShowSTR# 2</name>
<script>on mouseUpput "Balloons(""e&"ShowSTRList""e&", STRResourceID, tip[, version, alternativeRect])" ¬into fld "helpMessage"end mouseUpon mouseEnter-- This displays item 2 of STR# resource ID number 1514-- Note that it differs from the mouseEnter handler for-- "ShowSTR# 1" only in the item number to be displayed.ShowASTRList 1514,2,,6end mouseEnteron mouseLeaveRemoveABalloonend mouseLeave-- ShowASTRList handler is located in the script of this background</script>
</part>
<part>
<id>10</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>186</left>
<top>177</top>
<right>262</right>
<bottom>199</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>ShowPICT</name>
<script>on mouseUpput "Balloons(""e&"ShowPICT""e&", pictResourceID, tip[, Version, AlternativeRect])" ¬into fld "helpMessage"end mouseUpon mouseEnterput calcTip() into tipput Balloons("ShowPICT", 1514, tip) into helpResultput helpResult into fld "helpMessage"repeat until "-853" is not in helpResultput Balloons("ShowPICT", 1513, tip) into helpResultput helpResult into fld "helpMessage"end repeatend mouseEnteron mouseLeaveRemoveABalloonend mouseLeave</script>
</part>
<part>
<id>11</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>266</left>
<top>177</top>
<right>342</right>
<bottom>199</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>ShowSTR</name>
<script>on mouseUpput "Balloons(""e&"ShowSTR""e&", STRResourceID, tip[, version, alternativeRect])" ¬into fld "helpMessage"end mouseUpon mouseEnterShowAString 1514,,6end mouseEnteron mouseLeaveRemoveABalloonend mouseLeave-- ShowAString handler is located in the script of this background</script>
</part>
<content>
<layer>background</layer>
<id>3</id>
<text><span class="style2">alloons() XFCN is an external function which allows the objects in your stacks to display help balloons when the stack is run with System 7.0 or higher. To use the XFCN, you must copy the Balloons XFCN to your stack using either ResEdit or ResCopy. Once installed, use the scripts and function calls described in this stack to display your own help balloons.The many ways you may call Balloons() are explained later in detail, but brief examples are included here for quick reference. Click the balloon button above to turn on Balloon Help, and examine the balloons and scripts of the buttons below.Balloons() XFCN may be used to make two types of calls: general utility calls and display calls. General utility calls control the XFCN itself (turning on Balloon Help, for example) and use the syntax:</span><span class="style3">Balloons(Utility Call)</span><span class="style2">The Balloons() XFCN also uses display calls, which may be used to specifically display and manipulate various types of help balloons. Display calls use the syntax:</span><span class="style3">Balloons("Selector","Message","Tip"[,"Version","AlternativeRect"])</span><span class="style2">It is important to note that the "Selector" parameter is case sensitive and must be typed exactly as you see it in the example fields of this stack.</span></text>
</content>
<name>General Syntax</name>
<script>on RemoveABalloonget Balloons("Remove")if it is not empty thenput it into fld "helpMessage"end ifend RemoveABalloon</script>
</card>
card_7651.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<script>on mouseUpsend mouseUp to btn "hyperActive"end mouseUp</script>
</part>
<part>
<id>1</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>24</left>
<top>77</top>
<right>491</right>
<bottom>296</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>Copyright</name>
<script></script>
</part>
<part>
<id>2</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>28</left>
<top>309</top>
<right>68</right>
<bottom>336</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Back</name>
<script>on mouseUplock screengo cd "title"unlock screen with visual wipe rightend mouseUpon mouseEnterShowABalloon "Click here to return to the title card and the " ¬& "Table of Contents."end mouseEnteron mouseLeaveRemoveABalloonend mouseLeave</script>
</part>
<part>
<id>3</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>450</left>
<top>309</top>
<right>488</right>
<bottom>336</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Next</name>
<script>on mouseUplock screengo nextunlock screen with visual wipe leftend mouseUpon mouseEnterShowABalloon "Click here to move forward through this stack " ¬& "one card at a time."end mouseEnteron mouseLeaveRemoveABalloonend mouseLeave</script>
</part>
<part>
<id>4</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>410</left>
<top>309</top>
<right>449</right>
<bottom>336</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Prev</name>
<script>on mouseUplock screengo prevunlock screen with visual wipe rightend mouseUpon mouseEnterShowABalloon "Click here to move backward through this stack " ¬& "one card at a time."end mouseEnteron mouseLeaveRemoveABalloonend mouseLeave</script>
</part>
<part>
<id>5</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>197</left>
<top>302</top>
<right>313</right>
<bottom>340</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>HyperActive</name>
<script>on mouseUplock screenset the visible of cd fld "copyright" to ¬not the visible of cd fld "copyright"if not the visible of cd fld "copyright" then put "left" into viselse put "right" into visunlock screen with visual wipe visend mouseUpon mouseEnterShowAString 1516,,0end mouseEnteron mouseLeaveRemoveABalloonend mouseLeave</script>
<script>on mouseEnterShowABalloon "Click here to see general syntax information on" ¬&& "how to use Balloons().",,6end mouseEnteron mouseLeaveRemoveABalloonend mouseLeave</script>
<script>on mouseEnterput topLeft of me into tipadd 10 to item 1 of tipadd 10 to item 2 of tipput Balloons("ShowPICT", 1513, tip,6) into helpResultrepeat until "-853" is not in helpResultput Balloons("ShowPICT", 1513, tip, 6) into helpResultend repeatend mouseEnteron mouseLeaveRemoveABalloonend mouseLeave</script>
</part>
<part>
<id>10</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>470</left>
<top>18</top>
<right>501</right>
<bottom>45</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>On/Off</name>
<script>on mouseDownglobal isSixif isSix then errorMsgif Balloons("isOn") thenget Balloons("Off")set the hilite of me to falseelseget Balloons("On")set the hilite of me to truemouseEnterend ifend mouseDownon mouseEnterShowAString 1513,,2end mouseEnteron mouseLeaveRemoveABalloonend mouseLeave</script>
</part>
<part>
<id>11</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>450</left>
<top>309</top>
<right>488</right>
<bottom>336</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Next</name>
<script>on mouseUplock screengo nextunlock screen with visual wipe leftend mouseUpon mouseEnterShowABalloon "Click here to move forward through this stack " ¬& "one card at a time."end mouseEnteron mouseLeaveRemoveABalloonend mouseLeave</script>
</part>
<part>
<id>12</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>42</left>
<top>310</top>
<right>73</right>
<bottom>337</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Home</name>
<script>on mouseUpgo homeend mouseUpon mouseEnterShowABalloon "Click here to return to the Home stack."end mouseEnteron mouseLeaveRemoveABalloonend mouseLeave</script>
</part>
<part>
<id>13</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>410</left>
<top>309</top>
<right>450</right>
<bottom>336</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Prev</name>
<script>on mouseUplock screengo prevunlock screen with visual wipe rightend mouseUpon mouseEnterShowABalloon "Click here to move backward through this stack " ¬& "one card at a time."end mouseEnteron mouseLeaveRemoveABalloonend mouseLeave</script>
</part>
<name>title</name>
<script>on mouseUpif the name of the target contains "button" thenlock screengo cd (the short name of the target)unlock screen with visual wipe leftend ifend mouseUpon openCardglobal isSixif not isSixthen set the hilite of btn "on/off" to balloons("isOn")end openCard</script>
(CDRM1080320)(1993).iso/FILES/HYP/A-B/7 Balloons!.cpt/Balloons!/BMAP_7820.png){kind=link}
(CDRM1080320)(1993).iso/FILES/HYP/A-B/7 Balloons!.cpt/Balloons!/PATs.png){kind=link}